Public Class InsertAsComboBoxItem
  Public Enum InsertAsOptionList
    SmallURL = 0
    Thumbnail = 1
    SquareThumbnail = 2
    MedimumURL = 3
    LargeURL = 4
  End Enum

  Private _title As String
  Private _insertAs As InsertAsOptionList

  Public Property Title() As String
    Get
      Return _title
    End Get
    Set(ByVal value As String)
      _title = value
    End Set
  End Property

  Public Property InsertAs() As InsertAsOptionList
    Get
      Return _insertAs
    End Get
    Set(ByVal value As InsertAsOptionList)
      _insertAs = value
    End Set
  End Property
  Public Sub New(ByVal Title As String, ByVal InsertAs As InsertAsOptionList)
    Me._title = Title
    Me._insertAs = InsertAs

  End Sub
End Class
